function raised = Capitolize(str)
  % Convert capitol letters to lower case

    raised = regexprep(str, str(regexp(str, '[a-z]')),...
                        '${upper(str(regexp(str, ''[a-z]'')))}');
end

